From: Chong Yidong <cyd@stupidchicken.com>
Date: Fri, 15 Jun 2007 16:27:23 +0000 (+0000)
Subject: (widget-add-documentation-string-button): Fix handling of
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~421^2~18350
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=3eb090c2df9aff64da79f31bdfca34eead8ff11c;p=emacs.git

(widget-add-documentation-string-button): Fix handling of
documentation indent.
---

diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index 6addacee3cb..a69ebdc85e9 100644
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -2956,11 +2956,10 @@ Optional ARGS specifies additional keyword arguments for the
 	   (insert-char ?\s indent))
       (unless (or (numberp doc-indent) (null doc-indent))
 	(setq doc-indent 0))
-      (setq indent (widget-get widget :documentation-indent))
       (widget-put widget :buttons
 		  (cons (apply 'widget-create-child-and-convert
 			       widget 'documentation-string
-			       :indent indent
+			       :indent doc-indent
 			       (nconc args (list doc)))
 			(widget-get widget :buttons))))))